home *** CD-ROM | disk | FTP | other *** search
/ Info-Mac 4 / Info_Mac IV CD-ROM (Pacific HiTech Inc.)(August 1994).iso / Applications / Demos_Demo folder / Demos_Info folder / Demos™ Demonstration / Examples / Leveling < prev    next >
Text File  |  1993-11-04  |  3KB  |  138 lines
  1. { From user A Lumens, Project Leveling at Thu, Nov 4, 1993 3:52 PM}
  2.  
  3.  
  4. { System Variables with non-default values: }
  5. Typechecking := 1
  6. Checking := 1
  7. Saveoptions := 2
  8. Savevalues := 0
  9.  
  10.  
  11. { Non-default Time SysVar value: }
  12. Time := ['Jan','Feb','Mar','Apr','May','Jun','Jul','Aug','Sep']
  13.  
  14. Project Leveling
  15. Title: Leveling
  16. Description: Model leveling using Dynamic.  Shows how to level staff efforts over time according to staff available, computing both the work done over time and idle time.
  17. Author: Henrion
  18. Date: Fri, Oct 22, 1993 7:29 PM
  19. Saveauthor: A Lumens
  20. Savedate: Thu, Nov 4, 1993 3:52 PM
  21. Defaultsize: 48,20
  22. Diagstate: 1,23,48,455,278,17
  23. Windstate: 1,37,296
  24. Fontstyle: Geneva, 12
  25. Fileinfo: 0,-2,23541,Project Leveling,Leveling
  26. Getresource 
  27.  
  28. Chance Effort
  29. Title: Effort~
  30. needed
  31. Units: staff-months
  32. Description: The effort, or work load imposed on a given month.
  33. Definition: Table(Time)(
  34. 0,Normal(3,1),Uniform(0,2),Uniform(4,6),0,0,0,0,0)
  35. Location: 136,80
  36. Nodesize: 48,20
  37. Valuestate: 1,69,141,367,261,1,MIDM
  38.  
  39. Chance Staff
  40. Title: staff~
  41. avail
  42. Units: staff-months
  43. Description: Number of staff available
  44. Definition: 2
  45. Location: 136,144
  46. Nodesize: 48,20
  47. Valuestate: 1,137,293,299,80,0,MIDM
  48.  
  49. Chance Backlog
  50. Title: Backlog
  51. Units: staff-months
  52. Description: Backlog of work at the start of the month, including work for this month.
  53. Definition: Dynamic( 0,  Backlog[Time-1] +Effort[Time-1]- Work_done[time-1] )
  54. Location: 264,80
  55. Nodesize: 48,20
  56. Windstate: 1,560,189
  57. Valuestate: 1,69,85,362,254,1,MIDM
  58. Graphsetup: Distresol:4~
  59. Diststeps:1~
  60. Symbolsize:6~
  61. Linestyle:1~
  62. Frame:1~
  63. Grid:1~
  64. Ticks:1~
  65. Mesh:1~
  66. Scales:1~
  67. Frameauto:1~
  68. Xminimum:1~
  69. Xmaximum:10~
  70. Yminimum:0~
  71. Ymaximum:3~
  72. Zminimum:1~
  73. Zmaximum:1~
  74. Xintervals:0~
  75. Yintervals:3~
  76.  
  77. Reformval:           [Time      ,Probability]
  78.  
  79. Chance Work_done
  80. Title: Work~
  81. done
  82. Units: staff-months
  83. Description: work done on a given month, capped by staff available
  84. Definition: Min( [ Staff, Backlog+Effort] )
  85. Location: 264,144
  86. Nodesize: 48,20
  87. Valuestate: 1,125,152,381,250,1,MIDM
  88. Graphsetup: Distresol:4~
  89. Diststeps:1~
  90. Symbolsize:6~
  91. Linestyle:1~
  92. Frame:1~
  93. Grid:1~
  94. Ticks:1~
  95. Mesh:1~
  96. Scales:1~
  97. Frameauto:1~
  98. Xminimum:1~
  99. Xmaximum:10~
  100. Yminimum:0~
  101. Ymaximum:2~
  102. Zminimum:1~
  103. Zmaximum:1~
  104. Xintervals:0~
  105. Yintervals:3~
  106.  
  107. Reformval:           [Time      ,Probability]
  108.  
  109. Chance Idle_time
  110. Title: Idle~
  111. time
  112. Description: inverse of work done; the number of staff not needed on a given month
  113. Definition: Staff - Work_done
  114. Location: 264,200
  115. Nodesize: 48,20
  116. Valuestate: 1,137,178,334,239,1,MIDM
  117. Graphsetup: Distresol:4~
  118. Diststeps:1~
  119. Symbolsize:6~
  120. Linestyle:1~
  121. Frame:1~
  122. Grid:1~
  123. Ticks:1~
  124. Mesh:1~
  125. Scales:1~
  126. Frameauto:1~
  127. Xminimum:1~
  128. Xmaximum:10~
  129. Yminimum:0~
  130. Ymaximum:2~
  131. Zminimum:1~
  132. Zmaximum:1~
  133. Xintervals:0~
  134. Yintervals:3~
  135.  
  136.  
  137. Close Leveling
  138.